﻿Imports System.Collections.ObjectModel

Public Class PatientAddmissionInfo

    Public Property PatientId As Long

    Public Property AdminssionID As Long

    Public Property AdminssionDate As Date

    Public Property Complaints As String

    Public Property WardID As Integer?

    Public Property DepartmentID As Integer?

    Public Property RoomID As Integer?

    Public Property Remarks As String

    Public Property DischargeDate As Date?

    Public Property IsDischarged As Boolean

    Public Property DischargeBill As Long?

    Dim _payHistory As New ObservableCollection(Of BillPayDetails)
    Public ReadOnly Property PayHistory As ObservableCollection(Of BillPayDetails)
        Get
            Return _payHistory
        End Get
    End Property
End Class

Public Class AdmissionDisplay
    Inherits PatientRegistration

    Public Property AdminssionId As Long

    Public Property AdminssionDate As Date

    Public Property Complaints As String

    Public Property WardID As Integer?

    Public Property DepartmentID As Integer?

    Public Property RoomID As Integer?

    Public Property Room As String

End Class